inherited FrmCartaoLancamentoRel: TFrmCartaoLancamentoRel
  Caption = 'Relat'#243'rio de Lan'#231'amento de Cart'#245'es de Cr'#233'dito'
  ClientHeight = 331
  ClientWidth = 479
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited pnlOpcoes: TPanel
    Width = 479
    Height = 246
    object Panel1: TPanel
      Left = 4
      Top = 139
      Width = 471
      Height = 103
      Align = alBottom
      TabOrder = 0
      object RadioGroup_Ordenar: TRadioGroup
        Left = 1
        Top = 1
        Width = 125
        Height = 101
        Hint = 'Ordenar o relat'#243'rio por CODIGO ou NOME'
        Align = alLeft
        Caption = 'Ordenar por'
        ItemIndex = 0
        Items.Strings = (
          'Data e Cartao'
          'Data e Lote'
          'Data e Autoriza'#231#227'o'
          'Lote'
          'Autorizacao')
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
      end
      object RadioGroup_situacao: TRadioGroup
        Left = 126
        Top = 1
        Width = 132
        Height = 101
        Hint = 'Ordenar o relat'#243'rio por CODIGO ou NOME'
        Align = alClient
        Caption = 'Situa'#231#227'o'
        ItemIndex = 2
        Items.Strings = (
          'Baixados'
          'N'#227'o baixados'
          'Todos')
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
      end
      object RadioGroup_cancelados: TRadioGroup
        Left = 258
        Top = 1
        Width = 118
        Height = 101
        Hint = 'Ordenar o relat'#243'rio por CODIGO ou NOME'
        Align = alRight
        Caption = 'Cancelados'
        ItemIndex = 2
        Items.Strings = (
          'Cancelados'
          'N'#227'o cancelados'
          'Todos')
        ParentShowHint = False
        ShowHint = True
        TabOrder = 2
      end
      object RadioGroup_Intervalo: TRadioGroup
        Left = 376
        Top = 1
        Width = 94
        Height = 101
        Hint = 'Ordenar o relat'#243'rio por CODIGO ou NOME'
        Align = alRight
        Caption = 'Classificar por'
        ItemIndex = 0
        Items.Strings = (
          'Emiss'#227'o'
          'Vencimento'
          'Pagamento')
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
      end
    end
    object Panel2: TPanel
      Left = 4
      Top = 4
      Width = 471
      Height = 135
      Align = alClient
      TabOrder = 1
      object Label3: TLabel
        Left = 8
        Top = 4
        Width = 38
        Height = 13
        Caption = 'Cart'#227'o'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label2: TLabel
        Left = 8
        Top = 48
        Width = 50
        Height = 13
        Caption = 'Per'#237'odo:'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label7: TLabel
        Left = 117
        Top = 72
        Width = 8
        Height = 13
        Caption = 'a'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label1: TLabel
        Left = 236
        Top = 93
        Width = 26
        Height = 13
        Caption = 'Lote'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object Label4: TLabel
        Left = 8
        Top = 93
        Width = 68
        Height = 13
        Caption = 'Autoriza'#231#227'o'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object EdtCodCartao: TEdit
        Left = 8
        Top = 20
        Width = 38
        Height = 21
        Hint = 
          'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
          '/01/01)'
        CharCase = ecUpperCase
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        OnExit = EdtCodCartaoExit
      end
      object BitBtn_Tipo: TBitBtn
        Left = 48
        Top = 20
        Width = 21
        Height = 21
        Hint = 'Pesquisa tipo de pagamento'
        Caption = '...'
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        TabStop = False
        OnClick = BitBtn_TipoClick
      end
      object EdtNomCartao: TEdit
        Left = 70
        Top = 20
        Width = 385
        Height = 21
        Hint = 'Exibe a descri'#231#227'o ecf .'
        TabStop = False
        AutoSize = False
        CharCase = ecUpperCase
        Ctl3D = False
        ParentCtl3D = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 2
      end
      object EdtDataInicial: TEdit
        Left = 8
        Top = 64
        Width = 102
        Height = 21
        Hint = 
          'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
          '/01/01)'
        CharCase = ecUpperCase
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 3
        OnExit = EdtDataInicialExit
      end
      object EdtDataFinal: TEdit
        Left = 136
        Top = 64
        Width = 107
        Height = 21
        Hint = 
          'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
          '/01/01)'
        CharCase = ecUpperCase
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 4
        OnExit = EdtDataFinalExit
      end
      object EdtAutorizacao: TEdit
        Left = 8
        Top = 106
        Width = 221
        Height = 21
        Hint = 
          'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
          '/01/01)'
        CharCase = ecUpperCase
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 5
      end
      object EdtLote: TEdit
        Left = 236
        Top = 106
        Width = 221
        Height = 21
        Hint = 
          'Digite a data sem barras Ex: Voc'#234' digita 010101 e adata fica (01' +
          '/01/01)'
        CharCase = ecUpperCase
        Font.Charset = ANSI_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 6
      end
    end
  end
  inherited pnlBotoes: TPanel
    Top = 287
    Width = 479
    inherited BtnGerarPlanilha: TBitBtn
      Left = 221
      OnClick = nil
    end
  end
  inherited pnlCabecalho: TPanel
    Width = 479
    Caption = 'Relat'#243'rio de Lan'#231'amento de Cart'#245'es'
  end
  inherited RvProjectModelo: TRvProject
    Left = 384
    Top = 97
  end
  inherited sql_dataset_principal: TSQLClientDataSet
    CommandText = 'select * from SELECIONAR_TITULOS(0,'#39'01/01/2001'#39','#39'01/01/2009'#39')'
    OnCalcFields = sql_dataset_principalCalcFields
    object sql_dataset_principalDOCUMENTO: TStringField
      FieldName = 'DOCUMENTO'
      Size = 13
    end
    object sql_dataset_principalDATA_EMISSAO: TDateField
      FieldName = 'DATA_EMISSAO'
    end
    object sql_dataset_principalDATA_FILTRO: TDateField
      FieldName = 'DATA_FILTRO'
    end
    object sql_dataset_principalDATA_VENCIMENTO: TDateField
      FieldName = 'DATA_VENCIMENTO'
    end
    object sql_dataset_principalDATA_RECEBIMENTO: TDateField
      FieldName = 'DATA_RECEBIMENTO'
    end
    object sql_dataset_principalCOD_CARTAO: TStringField
      FieldName = 'COD_CARTAO'
      Size = 10
    end
    object sql_dataset_principalCARTAO: TStringField
      FieldName = 'CARTAO'
      Size = 35
    end
    object sql_dataset_principalVALOR: TFMTBCDField
      FieldName = 'VALOR'
      Precision = 15
      Size = 3
    end
    object sql_dataset_principalTAXA: TFMTBCDField
      FieldName = 'TAXA'
      Precision = 15
      Size = 3
    end
    object sql_dataset_principalCOD_EMPRESA: TSmallintField
      FieldName = 'COD_EMPRESA'
    end
    object sql_dataset_principalPARCELAS: TIntegerField
      FieldName = 'PARCELAS'
    end
    object sql_dataset_principalNUM_PARCELA: TIntegerField
      FieldName = 'NUM_PARCELA'
    end
    object sql_dataset_principalVALOR_A_RECEBER: TFMTBCDField
      FieldName = 'VALOR_A_RECEBER'
      Precision = 15
      Size = 3
    end
    object sql_dataset_principalVALOR_RECEBIDO: TFMTBCDField
      FieldName = 'VALOR_RECEBIDO'
      Precision = 15
      Size = 3
    end
    object sql_dataset_principalAUTORIZACAO: TStringField
      FieldName = 'AUTORIZACAO'
      FixedChar = True
      Size = 13
    end
    object sql_dataset_principalCANCELADO: TStringField
      FieldName = 'CANCELADO'
      FixedChar = True
      Size = 2
    end
    object sql_dataset_principalLOTE: TStringField
      FieldName = 'LOTE'
      Size = 13
    end
    object sql_dataset_principalValorTaxa: TCurrencyField
      FieldKind = fkCalculated
      FieldName = 'ValorTaxa'
      Calculated = True
    end
  end
  inherited rds_dataset_principal: TRvDataSetConnection
    Left = 216
    Top = 65
  end
  inherited RvSystemPDF: TRvSystem
    Left = 384
    Top = 185
  end
  object SQLC_Datas: TSQLClientDataSet
    CommandText = 'select DISTINCT CAL_DATA DATA from CARTAO_LANCAMENTO '
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    DBConnection = DtmGeral.ConexaoBanco
    Left = 104
    Top = 112
    object SQLC_DatasDATA: TDateField
      FieldName = 'DATA'
      Required = True
    end
  end
  object rds_datas: TRvDataSetConnection
    RuntimeVisibility = rtDeveloper
    DataSet = SQLC_Datas
    Left = 224
    Top = 200
  end
end
